home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
COMAL
/
Z-Misc Series
/
(k)zc.d64
/
proc.piep
< prev
next >
Wrap
Text File
|
2007-03-01
|
316b
|
15 lines
0030 ╨╥╧├ PIEP(ANT) ├╠╧╙┼─
0040 ╒╙┼ SOUND
0050 VOLUME(15)
0060 ADSR(1,7,0,8,0)
0070 SOUNDTYPE(1,1)
0080 SETFREQUENCY(1,12837)
0090 ╞╧╥ I:=1 ╘╧ ANT ─╧
0100 GATE(1,1)
0110 ╞╧╥ W:=1 ╘╧ 100 ─╧ ╬╒╠╠
0120 GATE(1,0)
0130 ╞╧╥ W:=1 ╘╧ 50 ─╧ ╬╒╠╠
0140 ┼╬─╞╧╥ I
0150 VOLUME(0)
0160 ┼╬─╨╥╧├ PIEP